VBA select case 练习

Sub demo() ' select case 练习 Dim card As String Dim i As Integer For i = 1 To 14 card = Range ...